#pragma once

#include <iostream>
#include <string>
#include <memory>
#include <sys/select.h>
#include "Log.hpp"
#include "Socket.hpp"

using namespace SocketModule;
using namespace LogModule;

#define NUM sizeof(fd_set) * 8
const int gdefaultfd = -1;

class SelectServer
{
public:
    SelectServer(int port)
        : _port(port),
          _isrunning(false),
          _listen_socket(std::make_unique<TcpSocket>(port))
    {
    }
    void Init()
    {
        // 初始化辅助数组 建立tcp监听
        _listen_socket->BuildTcpSocketMethod(_port);

        for (int i = 0; i < NUM; i++)
        {
            _fd_array[i] = gdefaultfd;
        }

        _fd_array[0] = _listen_socket->Fd(); // 将监听fd加入到就绪等待中
    }

    void Loop()
    {
        _isrunning = true;

        while (_isrunning)
        {
            fd_set rfds;
            timeval timeout = {1, 0};

            // 清空rfds
            FD_ZERO(&rfds); //必须要有，C接口不会默认初始化为0

            int maxfd = -1;
            // 1.每次开始轮循前增加rds
            for (int i = 0; i < NUM; i++)
            {
                if (_fd_array[i] == gdefaultfd)
                    continue;
                // 需要关心的文件描述符fd
                FD_SET(_fd_array[i], &rfds);

                maxfd = std::max(maxfd, _fd_array[i]);
            }

            // 2.开始监测    函数执行前用于用户通知内核的信息 执行完毕后为内核通知用户的信息
            int n = select(maxfd + 1, &rfds, nullptr, nullptr, nullptr);

            if (n > 0)
            {
                std::cout << "有事件就绪啦... " << std::endl;
                Dispatcher(rfds); // 把已经就绪的sockfd，派发给指定的模块
            }
            else if (n == 0)
            {
                std::cout << "时间结束，没有时间就绪" << std::endl;
            }
            else
            {
                PrintFd();
                LOG(LogLevel::ERROR) << "select failed";
                break;
            }
        }

        _isrunning = false;
    }

    void Accepter()
    {
        // 有新的连接要accept
        InetAddr client;
        int newsockfd = _listen_socket->Accepter(&client);
        if (newsockfd < 0)
        {
            LOG(LogLevel::ERROR) << "Accepter failed";
            return;
        }

        LOG(LogLevel::DEBUG) << "获得一个新连接 sockfd:" << newsockfd << "地址为:" << client.Addr();
        // 加入select里面
        int pos = -1;
        for (int i = 0; i < NUM; i++)
        {
            if (_fd_array[i] == gdefaultsockfd)
            {
                pos = i;
                break;
            }
        }

        if (pos == -1)
        {
            LOG(LogLevel::ERROR) << "select数组已经满了";
            return;
        }
        else
        {
            _fd_array[pos] = newsockfd;
            LOG(LogLevel::DEBUG) << newsockfd << "添加成功";
        }
    }

    void Recver(int fd)
    {
        // 读事件就绪 读取内容并且返回给用户
        char buffer[1024];
        int n = read(fd, buffer, sizeof(buffer) - 1); // 完整性暂且不管

        if (n > 0)
        {
            buffer[n] = 0;
            std::cout << buffer;
            std::string result = "echo #";
            result += buffer;
            write(fd, result.c_str(), result.size());
        }
        else if (n == 0)
        {
            // 写端关闭
            LOG(LogLevel::DEBUG) << fd << "写端关闭退出";
            for (int i = 0; i < NUM; i++)
            {
                if (_fd_array[i] == fd)
                {
                    _fd_array[i] = gdefaultfd;
                    break;
                }
            }
            close(fd); // 关闭文件
        }
        else
        {
            LOG(LogLevel::DEBUG) << fd << "读取错误";
            for (int i = 0; i < NUM; i++)
            {
                if (_fd_array[i] == fd)
                {
                    _fd_array[i] = gdefaultfd;
                    break;
                }
            }
            close(fd); // 关闭文件
        }
    }

    void Dispatcher(fd_set &rfds)
    {
        for (int i = 0; i < NUM; i++)
        {
            if (_fd_array[i] == gdefaultfd)
                continue;
            // 文件描述符，先得是合法的
            if (_fd_array[i] == _listen_socket->Fd())
            {
                if (FD_ISSET(_fd_array[i], &rfds))
                {
                    Accepter(); // 连接的获取
                }
            }
            else
            {
                if (FD_ISSET(_fd_array[i], &rfds))
                {
                    Recver(_fd_array[i]); // IO的处理
                }
            }
        }
    }

    ~SelectServer()
    {
    }

    void PrintFd()
    {
        for (int i = 0; i < NUM; i++)
        {
            if (_fd_array[i] == gdefaultfd)
                continue;

            std::cout << _fd_array[i] << " ";
        }
        std::cout << std::endl;
    }

private:
    uint16_t _port;
    std::unique_ptr<Socket> _listen_socket;
    bool _isrunning;
    int _fd_array[NUM]; // 辅助数组
};
